﻿Public Class Institucion

    Dim ocdInstitucion As New Datos.Institucion()

    Public Sub RegistrarInstitucion(ByVal paramNombre As String, ByVal paramPais As String)
        ocdInstitucion.RegistrarInstitucion(paramNombre, paramPais)
    End Sub

    Public Function obtenerListaInstituciones() As DataSet
        Dim ds As New DataSet()
        ds = ocdInstitucion.obtenerListaInstituciones()
        Return ds
    End Function

End Class
